home *** CD-ROM | disk | FTP | other *** search
- ------------------------------------------------------------------------
- -- plus.decTest -- decimal monadic addition --
- -- Copyright (c) IBM Corporation, 1981, 2004. All rights reserved. --
- ------------------------------------------------------------------------
- -- Please see the document "General Decimal Arithmetic Testcases" --
- -- at http://www2.hursley.ibm.com/decimal for the description of --
- -- these testcases. --
- -- --
- -- These testcases are experimental ('beta' versions), and they --
- -- may contain errors. They are offered on an as-is basis. In --
- -- particular, achieving the same results as the tests here is not --
- -- a guarantee that an implementation complies with any Standard --
- -- or specification. The tests are not exhaustive. --
- -- --
- -- Please send comments, suggestions, and corrections to the author: --
- -- Mike Cowlishaw, IBM Fellow --
- -- IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK --
- -- mfc@uk.ibm.com --
- ------------------------------------------------------------------------
- version: 2.39
-
- -- This set of tests primarily tests the existence of the operator.
- -- Addition and rounding, and most overflows, are tested elsewhere.
-
- extended: 1
- precision: 9
- rounding: half_up
- maxExponent: 384
- minexponent: -383
-
- plux001 plus '1' -> '1'
- plux002 plus '-1' -> '-1'
- plux003 plus '1.00' -> '1.00'
- plux004 plus '-1.00' -> '-1.00'
- plux005 plus '0' -> '0'
- plux006 plus '0.00' -> '0.00'
- plux007 plus '00.0' -> '0.0'
- plux008 plus '00.00' -> '0.00'
- plux009 plus '00' -> '0'
-
- plux010 plus '-2' -> '-2'
- plux011 plus '2' -> '2'
- plux012 plus '-2.00' -> '-2.00'
- plux013 plus '2.00' -> '2.00'
- plux014 plus '-0' -> '0'
- plux015 plus '-0.00' -> '0.00'
- plux016 plus '-00.0' -> '0.0'
- plux017 plus '-00.00' -> '0.00'
- plux018 plus '-00' -> '0'
-
- plux020 plus '-2000000' -> '-2000000'
- plux021 plus '2000000' -> '2000000'
- precision: 7
- plux022 plus '-2000000' -> '-2000000'
- plux023 plus '2000000' -> '2000000'
- precision: 6
- plux024 plus '-2000000' -> '-2.00000E+6' Rounded
- plux025 plus '2000000' -> '2.00000E+6' Rounded
- precision: 3
- plux026 plus '-2000000' -> '-2.00E+6' Rounded
- plux027 plus '2000000' -> '2.00E+6' Rounded
-
- -- more fixed, potential LHS swaps if done by add 0
- precision: 9
- plux060 plus '56267E-10' -> '0.0000056267'
- plux061 plus '56267E-5' -> '0.56267'
- plux062 plus '56267E-2' -> '562.67'
- plux063 plus '56267E-1' -> '5626.7'
- plux065 plus '56267E-0' -> '56267'
- plux066 plus '56267E+0' -> '56267'
- plux067 plus '56267E+1' -> '5.6267E+5'
- plux068 plus '56267E+2' -> '5.6267E+6'
- plux069 plus '56267E+3' -> '5.6267E+7'
- plux070 plus '56267E+4' -> '5.6267E+8'
- plux071 plus '56267E+5' -> '5.6267E+9'
- plux072 plus '56267E+6' -> '5.6267E+10'
- plux080 plus '-56267E-10' -> '-0.0000056267'
- plux081 plus '-56267E-5' -> '-0.56267'
- plux082 plus '-56267E-2' -> '-562.67'
- plux083 plus '-56267E-1' -> '-5626.7'
- plux085 plus '-56267E-0' -> '-56267'
- plux086 plus '-56267E+0' -> '-56267'
- plux087 plus '-56267E+1' -> '-5.6267E+5'
- plux088 plus '-56267E+2' -> '-5.6267E+6'
- plux089 plus '-56267E+3' -> '-5.6267E+7'
- plux090 plus '-56267E+4' -> '-5.6267E+8'
- plux091 plus '-56267E+5' -> '-5.6267E+9'
- plux092 plus '-56267E+6' -> '-5.6267E+10'
-
- -- "lhs" zeros in plus and minus have exponent = operand
- plux120 plus '-0E3' -> '0E+3'
- plux121 plus '-0E2' -> '0E+2'
- plux122 plus '-0E1' -> '0E+1'
- plux123 plus '-0E0' -> '0'
- plux124 plus '+0E0' -> '0'
- plux125 plus '+0E1' -> '0E+1'
- plux126 plus '+0E2' -> '0E+2'
- plux127 plus '+0E3' -> '0E+3'
-
- plux130 plus '-5E3' -> '-5E+3'
- plux131 plus '-5E8' -> '-5E+8'
- plux132 plus '-5E13' -> '-5E+13'
- plux133 plus '-5E18' -> '-5E+18'
- plux134 plus '+5E3' -> '5E+3'
- plux135 plus '+5E8' -> '5E+8'
- plux136 plus '+5E13' -> '5E+13'
- plux137 plus '+5E18' -> '5E+18'
-
- -- specials
- plux150 plus 'Inf' -> 'Infinity'
- plux151 plus '-Inf' -> '-Infinity'
- plux152 plus NaN -> NaN
- plux153 plus sNaN -> NaN Invalid_operation
- plux154 plus NaN77 -> NaN77
- plux155 plus sNaN88 -> NaN88 Invalid_operation
- plux156 plus -NaN -> -NaN
- plux157 plus -sNaN -> -NaN Invalid_operation
- plux158 plus -NaN77 -> -NaN77
- plux159 plus -sNaN88 -> -NaN88 Invalid_operation
-
- -- overflow tests
- maxexponent: 999999999
- minexponent: -999999999
- precision: 3
- plux160 plus 9.999E+999999999 -> Infinity Inexact Overflow Rounded
- plux161 plus -9.999E+999999999 -> -Infinity Inexact Overflow Rounded
-
- -- subnormals and underflow
- precision: 3
- maxexponent: 999
- minexponent: -999
- plux210 plus 1.00E-999 -> 1.00E-999
- plux211 plus 0.1E-999 -> 1E-1000 Subnormal
- plux212 plus 0.10E-999 -> 1.0E-1000 Subnormal
- plux213 plus 0.100E-999 -> 1.0E-1000 Subnormal Rounded
- plux214 plus 0.01E-999 -> 1E-1001 Subnormal
- -- next is rounded to Emin
- plux215 plus 0.999E-999 -> 1.00E-999 Inexact Rounded Subnormal Underflow
- plux216 plus 0.099E-999 -> 1.0E-1000 Inexact Rounded Subnormal Underflow
- plux217 plus 0.009E-999 -> 1E-1001 Inexact Rounded Subnormal Underflow
- plux218 plus 0.001E-999 -> 0E-1001 Inexact Rounded Subnormal Underflow
- plux219 plus 0.0009E-999 -> 0E-1001 Inexact Rounded Subnormal Underflow
- plux220 plus 0.0001E-999 -> 0E-1001 Inexact Rounded Subnormal Underflow
-
- plux230 plus -1.00E-999 -> -1.00E-999
- plux231 plus -0.1E-999 -> -1E-1000 Subnormal
- plux232 plus -0.10E-999 -> -1.0E-1000 Subnormal
- plux233 plus -0.100E-999 -> -1.0E-1000 Subnormal Rounded
- plux234 plus -0.01E-999 -> -1E-1001 Subnormal
- -- next is rounded to Emin
- plux235 plus -0.999E-999 -> -1.00E-999 Inexact Rounded Subnormal Underflow
- plux236 plus -0.099E-999 -> -1.0E-1000 Inexact Rounded Subnormal Underflow
- plux237 plus -0.009E-999 -> -1E-1001 Inexact Rounded Subnormal Underflow
- plux238 plus -0.001E-999 -> -0E-1001 Inexact Rounded Subnormal Underflow
- plux239 plus -0.0009E-999 -> -0E-1001 Inexact Rounded Subnormal Underflow
- plux240 plus -0.0001E-999 -> -0E-1001 Inexact Rounded Subnormal Underflow
-
- -- long operand checks
- maxexponent: 999
- minexponent: -999
- precision: 9
- plux301 plus 12345678000 -> 1.23456780E+10 Rounded
- plux302 plus 1234567800 -> 1.23456780E+9 Rounded
- plux303 plus 1234567890 -> 1.23456789E+9 Rounded
- plux304 plus 1234567891 -> 1.23456789E+9 Inexact Rounded
- plux305 plus 12345678901 -> 1.23456789E+10 Inexact Rounded
- plux306 plus 1234567896 -> 1.23456790E+9 Inexact Rounded
-
- -- still checking
- precision: 15
- plux321 plus 12345678000 -> 12345678000
- plux322 plus 1234567800 -> 1234567800
- plux323 plus 1234567890 -> 1234567890
- plux324 plus 1234567891 -> 1234567891
- plux325 plus 12345678901 -> 12345678901
- plux326 plus 1234567896 -> 1234567896
- precision: 9
-
- -- Null tests
- plu900 plus # -> NaN Invalid_operation
-
-